www.gusucode.com > Neutrosophic logic toolbox Package_ Neutrosophic Matrices > Neutrosophic logic toolbox Package_ Neutrosophic Matrices/@nm/getnonim.m
function A1=getnonm(A) % function A1=getnonim(A) % Return new object A1, constructed as nm, % but constists with only elememts where the conditions for neutrosophic % matrix is not satisfied - Am(i,j)+An(i,j)>1 % and zeros in all other places. % See also checkim.m nm.m % %In the Name of ALLAH % neutrosphic logic toolbox for computing single valued neutrosophic Matrices % Copyright (C) 2015-2019 Broumi said %for for details see the refrence: %Said Broumi, Le Hoang Son, Assia Bakali, Mohamed Talea, Florentin Smarandache, %Ganeshsree Selvachandran, Computing Operational Matrices in Neutrosophic Environments: %A Matlab Toolbox,Neutrosophic Sets and Systems, 18,2017,pp.58-66. % neutrosphic logic toolbox for computing single valued neutrosophic Matrice comes % This is free software, and you are welcome to redistribut;see license.txt for details. ij=size(A); for i=1:ij(1) for j=1:ij(2) if A.m(i,j)+A.i(i,j)+A.n(i,j)>1 A1.m(i,j)=A.m(i,j); A1.i(i,j)=A.i(i,j); A1.n(i,j)=A.n(i,j); else A1.m(i,j)=0; A1.i(i,j)=0; A1.n(i,j)=0; end end end A1=nm(A1.m,A1.i,A1.n);